home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Medal Software 5
/
Gold Medal Software - Volume 5 (Gold Medal) (1995).iso
/
database
/
cardx135.arj
/
LABELSHT.PRT
< prev
next >
Wrap
Text File
|
1993-11-28
|
2KB
|
24 lines
;__ Prints 3 accross X 11 down self-adhesive labels on 8 1/2" X 11" sheets __
;LaserJet III printer commands.
#27 69# ;Reset printer.
#27 &l2A# ;Letter size paper.
#27 &l6D# ;60 lines per inch.
#27 (s0P# ;Fixed spacing.
#27 (s12H# ;12 CPI.
#27 &l1E# ;Top margin = 1.
TRIM(26) ;Lines after trimmed to (n) length.
;Repeat ten times Down on a page.
;Repeat three times across on a page at the Column numbers.
;Last number is Right margin.
;REP(Down on a page, Column #1, Column #29, Column #57, Right margin)
;REP( 10, 01, 29, 57, 79)
REP(10, 02, 35, 69, 95) ;Start REP loop.
01 FNAME ' ' LNAME ;First name, space and Last name.
02 ADDRESS ;P. O. Box.
03 STREET ;Street address.
04 TOWN ', ' STATE '. ' ZIP ;City, State and Zip code.
06 ;Last line of label.
ENDREP ;End of REP loop.
;#27 69# ;Reset printer.